home *** CD-ROM | disk | FTP | other *** search
/ Aminet 40 / Aminet 40 (2000)(Schatztruhe)[!][Dec 2000].iso / Aminet / dev / c / Emperor.lha / Emperor / Projects / DevsManager.c < prev    next >
Encoding:
C/C++ Source or Header  |  2000-10-21  |  91.3 KB  |  1,570 lines
  1. /* code was generated by Emperor */
  2.  
  3. #define CATCOMP_NUMBERS
  4. #define CATCOMP_STRINGS
  5. #define ALL_REACTION_CLASSES
  6. #define ALL_REACTION_MACROS
  7. #include <stdio.h>
  8. #include <stdlib.h>
  9. #include <string.h>
  10. #include <clib/alib_protos.h>
  11. #include <clib/asl_protos.h>
  12. #include <clib/dos_protos.h>
  13. #include <clib/exec_protos.h>
  14. #include <clib/gadtools_protos.h>
  15. #include <clib/graphics_protos.h>
  16. #include <clib/intuition_protos.h>
  17. #include <clib/locale_protos.h>
  18. #include <clib/resource_protos.h>
  19. #include <clib/utility_protos.h>
  20. #include <clib/colorwheel_protos.h>
  21. #include <clib/datebrowser_protos.h>
  22. #include <clib/texteditor_protos.h>
  23. #include <gadgets/colorwheel.h>
  24. #include <gadgets/datebrowser.h>
  25. #include <gadgets/gradientslider.h>
  26. #include <gadgets/tapedeck.h>
  27. #include <gadgets/texteditor.h>
  28. #include <proto/texteditor.h>
  29. #include <intuition/gadgetclass.h>
  30. #include <intuition/icclass.h>
  31. #include <intuition/imageclass.h>
  32. #include <reaction/reaction.h>
  33. #include <workbench/startup.h>
  34. #include <wbstartup.h>
  35.  
  36. #define TapeDeckObject   NewObject(NULL, "tapedeck.gadget"
  37. #define TextEditorObject NewObject(TEXTEDITOR_GetClass(), NULL
  38. #define INTUITIONLIBRARY "intuition.library"
  39. #define LOCALELIBRARY "locale.library"
  40. #define GADTOOLSLIBRARY "gadtools.library"
  41. #define ASLLIBRARY "asl.library"
  42. #define DOSLIBRARY "dos.library"
  43. #define RESOURCELIBRARY "resource.library"
  44. #define WINDOWCLASSLIB "window.class"
  45. #define REQUESTERCLASSLIB "requester.class"
  46. #define LABELIMAGELIB "images/label.image"
  47. #define BUTTONGADGETLIB "gadgets/button.gadget"
  48. #define CHECKBOXGADGETLIB "gadgets/checkbox.gadget"
  49. #define CHOOSERGADGETLIB "gadgets/chooser.gadget"
  50. #define CLICKTABGADGETLIB "gadgets/clicktab.gadget"
  51. #define COLORWHEELGADGETLIB "gadgets/colorwheel.gadget"
  52. #define DATEBROWSERGADGETLIB "gadgets/datebrowser.gadget"
  53. #define FUELGAUGEGADGETLIB "gadgets/fuelgauge.gadget"
  54. #define GETFILEGADGETLIB "gadgets/getfile.gadget"
  55. #define GETFONTGADGETLIB "gadgets/getfont.gadget"
  56. #define GETSCREENMODEGADGETLIB "gadgets/getscreenmode.gadget"
  57. #define GRADIENTSLIDERGADGETLIB "gadgets/gradientslider.gadget"
  58. #define INTEGERGADGETLIB "gadgets/integer.gadget"
  59. #define LAYOUTGADGETLIB "gadgets/layout.gadget"
  60. #define LISTBROWSERGADGETLIB "gadgets/listbrowser.gadget"
  61. #define PALETTEGADGETLIB "gadgets/palette.gadget"
  62. #define RADIOBUTTONGADGETLIB "gadgets/radiobutton.gadget"
  63. #define SCROLLERGADGETLIB "gadgets/scroller.gadget"
  64. #define SLIDERGADGETLIB "gadgets/slider.gadget"
  65. #define SPACEGADGETLIB "gadgets/space.gadget"
  66. #define SPEEDBARGADGETLIB "gadgets/speedbar.gadget"
  67. #define STRINGGADGETLIB "gadgets/string.gadget"
  68. #define TAPEDECKGADGETLIB "gadgets/tapedeck.gadget"
  69. #define TEXTEDITORGADGETLIB "gadgets/texteditor.gadget"
  70. #define LOCALE_REQUEST_INITIALIZATIONERROR_TITLE GetCatalogStr(Catalog, 0, "Program error")
  71. #define LOCALE_REQUEST_INITIALIZATIONERROR_GADGET GetCatalogStr(Catalog, 1, "Okay")
  72. #define LOCALE_REQUEST_INITIALIZATIONERROR_BODYTITLE GetCatalogStr(Catalog, 2, "Error during initialization:\n")
  73. #define LOCALE_REQUEST_INITIALIZATIONERROR_ERRRTEXT1 GetCatalogStr(Catalog, 3, "Can't open Amiga-library\n")
  74. #define LOCALE_REQUEST_INITIALIZATIONERROR_ERRRTEXT2 GetCatalogStr(Catalog, 4, "Can't lock your public-screen.\n")
  75. #define LOCALE_REQUEST_INITIALIZATIONERROR_ERRRTEXT3 GetCatalogStr(Catalog, 5, "Can't get visualinfo of your public-screen.\n")
  76. #define LOCALE_REQUEST_INITIALIZATIONERROR_ERRRTEXT4 GetCatalogStr(Catalog, 6, "Can't create menu.\n")
  77. #define LOCALE_REQUEST_INITIALIZATIONERROR_ERRRTEXT5 GetCatalogStr(Catalog, 7, "Can't create message-port.\n")
  78. #define LOCALE_REQUEST_INITIALIZATIONERROR_SOLUTION1 GetCatalogStr(Catalog, 8, "\nProbably you don't have a correct\ninstalled AmigaOS 3.5 system !")
  79. #define LOCALE_REQUEST_INITIALIZATIONERROR_SOLUTION2 GetCatalogStr(Catalog, 9, "\nMaybe there isn't enough memory !")
  80. #define LOCALE_WINDOW_TITLE1 GetCatalogStr(Catalog, 10, "Window")
  81. #define LOCALE_SCREEN_TITLE1 GetCatalogStr(Catalog, 11, "DevsManager Version 1.0  created by Emperor")
  82. #define LOCALE_ICONIFIED_TITLE1 GetCatalogStr(Catalog, 12, "Iconified Program")
  83. #define LOCALE_MENU_PROJECT GetCatalogStr(Catalog, 13, "Project")
  84. #define LOCALE_MENU_INFO GetCatalogStr(Catalog, 14, "Information")
  85. #define LOCALE_MENU_QUIT GetCatalogStr(Catalog, 15, "Quit")
  86. #define LOCALE_MENU_TYPE GetCatalogStr(Catalog, 16, "Type")
  87. #define LOCALE_SELECTED_STRING GetCatalogStr(Catalog, 17, "Selected: NOTHING")
  88. #define LOCALE_REQUEST_QUIT_TITLE GetCatalogStr(Catalog, 18, "Program request")
  89. #define LOCALE_REQUEST_QUIT_BODY GetCatalogStr(Catalog, 19, " Do you really want to quit this program ?")
  90. #define LOCALE_REQUEST_QUIT_GADGET GetCatalogStr(Catalog, 20, "Okay|No")
  91. #define LOCALE_REQUEST_INFO_TITLE GetCatalogStr(Catalog, 21, "Program information")
  92. #define LOCALE_REQUEST_INFO_BODY GetCatalogStr(Catalog, 22, " DevsManager was written by Matthias Gietzelt\n DevsManager was created by Emperor")
  93. #define LOCALE_REQUEST_INFO_GADGET GetCatalogStr(Catalog, 23, "Okay")
  94. #define LOCALE_DELETE GetCatalogStr(Catalog, 24, "Delete")
  95. #define Listbrowser1 Gadget1[4]
  96. #define Space1 Gadget1[6]
  97. #define Chooser1 Gadget1[7]
  98. #define Space5 Gadget1[8]
  99. #define Button1 Gadget1[9]
  100. #define Button2 Gadget1[10]
  101. #define Space4 Gadget1[11]
  102. #define Button4 Gadget1[12]
  103. #define Space3 Gadget1[13]
  104. #define Button3 Gadget1[14]
  105. #define Space2 Gadget1[15]
  106. #define Listbrowser2 Gadget1[17]
  107. #define Button5 Gadget1[18]
  108. #define Menu_Project 65504
  109. #define Menu_Information 63488
  110. #define Menu_Quit 63552
  111. #define Menu_Type 65505
  112. #define Menu_DataTypes 63489
  113. #define Menu_DOSDrivers 63521
  114. #define Menu_Keymaps 63553
  115. #define Menu_Monitors 63585
  116. #define Menu_Printers 63617
  117. BYTE Emperor_Gadgetkind1[21] = { 0, 12, 12, 12, 13, 12, 18, 2, 18, 0, 0, 18, 0, 18, 0, 18, 12, 13, 0, -1 };
  118.  
  119. LONG Quitrequest1(void);
  120. LONG Inforequest1(void);
  121. void Listbrowser1_GadgetUp_Event(void);
  122. void Chooser1_GadgetUp_Event(void);
  123. void Button1_GadgetUp_Event(void);
  124. void Button2_GadgetUp_Event(void);
  125. void Button4_GadgetUp_Event(void);
  126. void Button3_GadgetUp_Event(void);
  127. void Listbrowser2_GadgetUp_Event(void);
  128. void Menu_Information_MenuPick_Event(void);
  129. void Menu_Quit_MenuPick_Event(void);
  130. void Menu_DataTypes_MenuPick_Event(void);
  131. void Menu_DOSDrivers_MenuPick_Event(void);
  132. void Menu_Keymaps_MenuPick_Event(void);
  133. void Menu_Monitors_MenuPick_Event(void);
  134. void Menu_Printers_MenuPick_Event(void);
  135. void Window1_CloseWindow_Event(void);
  136. void Window1_ShowWindow_Event(void);
  137. void Startup(void);
  138. void Shutdown(void);
  139. BOOL Emperor_InitProgram(void);
  140. void Emperor_QuitProgram(void);
  141. void Emperor_CloseWindow_Window1(void);
  142. void Emperor_IconifyWindow_Window1(void);
  143. struct Window *Emperor_OpenWindow_Window1(void);
  144. struct Window *Emperor_UniconifyWindow_Window1(void);
  145. BOOL Emperor_GetMenuItemAttr(UWORD, UBYTE);
  146. void Emperor_SetMenuItemAttr(UWORD, UBYTE, BOOL);
  147. STRPTR Emperor_GetGadgetAttr(struct Gadget *);
  148. void Emperor_SetGadgetAttr(struct Gadget *, STRPTR);
  149. STRPTR Emperor_GetGadgetAttrComplex(struct Gadget *, ULONG);
  150. void Emperor_SetGadgetAttrComplex(struct Gadget *, ULONG, STRPTR);
  151. BOOL Emperor_GetGadgetDisabledAttr(struct Gadget *);
  152. void Emperor_SetGadgetDisabledAttr(struct Gadget *, BOOL);
  153. BOOL Emperor_GetGadgetReadOnlyAttr(struct Gadget *);
  154. void Emperor_SetGadgetReadOnlyAttr(struct Gadget *, BOOL);
  155. void Emperor_ActivateGadget(struct Gadget *);
  156. void Emperor_RethinkLayout(struct Gadget *);
  157. void Emperor_RefreshGList(struct Gadget *, WORD);
  158. void Emperor_ChangeWindowPosition(struct Window *, WORD, WORD);
  159. void Emperor_ChangeWindowSize(struct Window *, WORD, WORD);
  160. void Emperor_SetWindowBusyPointer(struct Window *, BOOL);
  161. void Emperor_SetWindowTitle(struct Window *, STRPTR);
  162. void Emperor_SetScreenTitle(struct Window *, STRPTR);
  163. void Emperor_AllocChooserNode(struct List *, char **, WORD *);
  164. void Emperor_AllocClicktabNode(struct List *, char **, WORD *);
  165. void Emperor_AllocListbrowserNode(struct List *, char **, WORD *);
  166. void Emperor_AllocListbrowserGadToolsNode(struct List *, char **);
  167. void Emperor_AllocRadiobuttonNode(struct List *, char **, WORD *);
  168. LONG stringlength(STRPTR buffer);
  169. LONG stringtoint(STRPTR);
  170. STRPTR inttostring(LONG);
  171.  
  172. struct Library *IntuitionBase = NULL;
  173. struct Library *LocaleBase = NULL;
  174. struct Library *GadToolsBase = NULL;
  175. struct Library *ASLBase = NULL;
  176. struct Library *DOSLibBase = NULL;
  177. struct Library *ResourceBase = NULL;
  178. struct Library *RequesterBase = NULL;
  179. struct Library *WindowBase = NULL;
  180. struct Library *ButtonBase = NULL;
  181. struct Library *CheckBoxBase = NULL;
  182. struct Library *ChooserBase = NULL;
  183. struct Library *ClickTabBase = NULL;
  184. struct Library *ColorWheelBase = NULL;
  185. struct Library *DateBrowserBase = NULL;
  186. struct Library *FuelGaugeBase = NULL;
  187. struct Library *GetFileBase = NULL;
  188. struct Library *GetFontBase = NULL;
  189. struct Library *GetScreenModeBase = NULL;
  190. struct Library *IntegerBase = NULL;
  191. struct Library *LabelBase = NULL;
  192. struct Library *LayoutBase = NULL;
  193. struct Library *ListBrowserBase = NULL;
  194. struct Library *PaletteBase = NULL;
  195. struct Library *RadioButtonBase = NULL;
  196. struct Library *ScrollerBase = NULL;
  197. struct Library *SliderBase = NULL;
  198. struct Library *SpaceBase = NULL;
  199. struct Library *SpeedBarBase = NULL;
  200. struct Library *StringBase = NULL;
  201. struct Library *TapeDeckBase = NULL;
  202. struct Library *TextEditorBase = NULL;
  203. struct List Chooser_Nodearray1;
  204. struct List Clicktab_Nodearray1;
  205. struct List Listbrowser_Nodearray1;
  206. struct List Listbrowser_GadTools_Nodearray1;
  207. struct List Radiobutton_Nodearray1;
  208.  
  209. struct NewMenu NewMenu[] =
  210. {
  211.     { NM_TITLE, 0, 0, 0, 0, 0 },
  212.     { NM_ITEM, 0, "I", 0, 0, 0 },
  213.     { NM_ITEM, NM_BARLABEL, 0, 0, 0, 0 },
  214.     { NM_ITEM, 0, "Q", 0, 0, 0 },
  215.     { NM_TITLE, 0, 0, 0, 0, 0 },
  216.     { NM_ITEM, 0, "1", 0, 0, 0 },
  217.     { NM_ITEM, 0, "2", 0, 0, 0 },
  218.     { NM_ITEM, 0, "3", 0, 0, 0 },
  219.     { NM_ITEM, 0, "4", 0, 0, 0 },
  220.     { NM_ITEM, 0, "5", 0, 0, 0 },
  221.     { NM_END, 0, 0, 0, 0, 0 }
  222. };
  223.  
  224. void *vinfo = NULL;
  225. BOOL os35 = TRUE;
  226. BOOL terminated = FALSE;
  227. ULONG WindowSignals1 = 0L;
  228. Object *WindowObject1 = NULL;
  229. struct Catalog *Catalog = NULL;
  230. struct Gadget *Gadget1[20];
  231. struct Menu *Menu = NULL;
  232. struct MsgPort *AppPort = NULL;
  233. struct Screen *Screen = NULL;
  234. struct Window *Window1 = NULL;
  235.  
  236. /* global variables declarations */
  237.  
  238. char *Nodearray1raw[] = { "DataTypes", "DOSDrivers", "Keymaps", "Monitors", "Printers", NULL };
  239. WORD Nodearray1attr[] = { 0, 0, 0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1, -1, 0, 0, NULL };
  240.  
  241. void main(void)
  242. {
  243.     BYTE Emperor_Exception = 0;
  244.     ULONG Emperor_Input, Emperor_Code;
  245.     char Emperor_ExceptionString[200];
  246.     struct EasyStruct EmperorRequest_InitializationErrorRequest;
  247.     struct IntuiMessage *IntuiMessage = NULL;
  248.     struct Gadget *GadgetMessage = NULL;
  249.  
  250.     Emperor_Input = 0L;
  251.     Emperor_Code = 0L;
  252.     if(!Emperor_InitProgram())
  253.     {
  254.         if(Screen = LockPubScreen(NULL))
  255.         {
  256.             if(vinfo = GetVisualInfo(Screen, TAG_DONE))
  257.             {
  258.                 NewMenu[0].nm_Label = LOCALE_MENU_PROJECT;
  259.                 NewMenu[1].nm_Label = LOCALE_MENU_INFO;
  260.                 NewMenu[2].nm_Label = NM_BARLABEL;
  261.                 NewMenu[3].nm_Label = LOCALE_MENU_QUIT;
  262.                 NewMenu[4].nm_Label = LOCALE_MENU_TYPE;
  263.                 NewMenu[5].nm_Label = "DataTypes";
  264.                 NewMenu[6].nm_Label = "DOSDrivers";
  265.                 NewMenu[7].nm_Label = "Keymaps";
  266.                 NewMenu[8].nm_Label = "Monitors";
  267.                 NewMenu[9].nm_Label = "Printers";
  268.                 if(Menu = CreateMenus(NewMenu, GTMN_FullMenu, TRUE, TAG_DONE))
  269.                 {
  270.                     LayoutMenus(Menu, vinfo, GTMN_FrontPen, 0, TAG_DONE);
  271.                     Emperor_AllocChooserNode(&Chooser_Nodearray1, Nodearray1raw, Nodearray1attr);
  272.                     Emperor_AllocClicktabNode(&Clicktab_Nodearray1, Nodearray1raw, Nodearray1attr);
  273.                     Emperor_AllocListbrowserNode(&Listbrowser_Nodearray1, Nodearray1raw, Nodearray1attr);
  274.                     Emperor_AllocListbrowserGadToolsNode(&Listbrowser_GadTools_Nodearray1, Nodearray1raw);
  275.                     Emperor_AllocRadiobuttonNode(&Radiobutton_Nodearray1, Nodearray1raw, Nodearray1attr);
  276.                     if(AppPort = CreateMsgPort())
  277.                     {
  278.                         if(os35)
  279.                         {
  280.                             WindowObject1 = (Object *) WindowObject,
  281.                                             WA_Width, 400,
  282.                                             WA_Height, 190,
  283.                                             WA_SizeGadget, TRUE,
  284.                                             WA_DragBar, TRUE,
  285.                                             WA_DepthGadget, TRUE,
  286.                                             WA_CloseGadget, TRUE,
  287.                                             WA_Activate, TRUE,
  288.                                             WA_AutoAdjust, TRUE,
  289.                                             WA_IDCMP, IDCMP_GADGETDOWN | IDCMP_GADGETUP | IDCMP_GADGETHELP | IDCMP_MENUPICK | IDCMP_MENUHELP | IDCMP_CLOSEWINDOW | IDCMP_ACTIVEWINDOW | IDCMP_INACTIVEWINDOW | IDCMP_RAWKEY | IDCMP_VANILLAKEY | IDCMP_MOUSEBUTTONS | IDCMP_MOUSEMOVE | IDCMP_NEWSIZE | IDCMP_CHANGEWINDOW | IDCMP_SIZEVERIFY | IDCMP_REFRESHWINDOW | IDCMP_INTUITICKS,                                            WA_MinWidth, 0,
  290.                                             WA_MinHeight, 0,
  291.                                             WA_MaxWidth, 0,
  292.                                             WA_MaxHeight, 0,
  293.                                             WA_Title, LOCALE_WINDOW_TITLE1,
  294.                                             WA_ScreenTitle, LOCALE_SCREEN_TITLE1,
  295.                                             WA_PubScreen, Screen,
  296.                                             WINDOW_IconifyGadget, FALSE,
  297.                                             WINDOW_IconTitle, LOCALE_ICONIFIED_TITLE1,
  298.                                             WINDOW_AppPort, AppPort,
  299.                                             WINDOW_Position, WPOS_CENTERMOUSE,
  300.                                             WINDOW_ParentGroup, (Object *) Gadget1[0] = (Object *) VGroupObject,
  301.                                                                 LAYOUT_SpaceOuter, TRUE,
  302.                                                                 LAYOUT_DeferLayout, TRUE,
  303.                                                                 LAYOUT_AddChild, (Object *) Gadget1[1] = (Object *) LayoutObject,
  304.                                                                                  LAYOUT_Label, "",
  305.                                                                                  LAYOUT_Orientation, 1,
  306.                                                                                  LAYOUT_HorizAlignment, LALIGN_LEFT,
  307.                                                                                  LAYOUT_VertAlignment, LALIGN_TOP,
  308.                                                                                  LAYOUT_LabelPlace, BVJ_TOP_LEFT,
  309.                                                                                  LAYOUT_BevelState, IDS_NORMAL,
  310.                                                                                  GA_ID, 0,
  311.                                                                                  GA_GadgetHelpText, "",
  312.                                                                                  GA_RelVerify, TRUE,
  313.                                                                                  GA_GadgetHelp, TRUE,
  314.                                                                                  LAYOUT_AddChild, (Object *) Gadget1[2] = (Object *) LayoutObject,
  315.                                                                                                   LAYOUT_Label, "",
  316.                                                                                                   LAYOUT_Orientation, 0,
  317.                                                                                                   LAYOUT_HorizAlignment, LALIGN_LEFT,
  318.                                                                                                   LAYOUT_VertAlignment, LALIGN_TOP,
  319.                                                                                                   LAYOUT_LabelPlace, BVJ_TOP_LEFT,
  320.                                                                                                   LAYOUT_BevelState, IDS_NORMAL,
  321.                                                                                                   GA_ID, 1,
  322.                                                                                                   GA_GadgetHelpText, "",
  323.                                                                                                   GA_RelVerify, TRUE,
  324.                                                                                                   GA_GadgetHelp, TRUE,
  325.                                                                                                   LAYOUT_AddChild, (Object *) Gadget1[3] = (Object *) LayoutObject,
  326.                                                                                                                    LAYOUT_Label, "Devices",
  327.                                                                                                                    LAYOUT_Orientation, 0,
  328.                                                                                                                    LAYOUT_HorizAlignment, LALIGN_LEFT,
  329.                                                                                                                    LAYOUT_VertAlignment, LALIGN_TOP,
  330.                                                                                                                    LAYOUT_LabelPlace, BVJ_TOP_CENTER,
  331.                                                                                                                    LAYOUT_BevelState, IDS_NORMAL,
  332.                                                                                                                    GA_ID, 2,
  333.                                                                                                                    GA_GadgetHelpText, "",
  334.                                                                                                                    GA_RelVerify, TRUE,
  335.                                                                                                                    GA_GadgetHelp, TRUE,
  336.                                                                                                                    LAYOUT_AddChild, (Object *) Gadget1[4] = (Object *) ListBrowserObject,
  337.                                                                                                                                     LISTBROWSER_AutoFit, TRUE,
  338.                                                                                                                                     LISTBROWSER_ShowSelected, TRUE,
  339.                                                                                                                                     LISTBROWSER_VerticalProp, TRUE,
  340.                                                                                                                                     LISTBROWSER_HorizontalProp, TRUE,
  341.                                                                                                                                     GA_ID, 3,
  342.                                                                                                                                     GA_GadgetHelpText, "",
  343.                                                                                                                                     GA_RelVerify, TRUE,
  344.                                                                                                                                     GA_GadgetHelp, TRUE,
  345.                                                                                                                    End,
  346.                                                                                                   End,
  347.                                                                                                   LAYOUT_AddChild, (Object *) Gadget1[5] = (Object *) LayoutObject,
  348.                                                                                                                    LAYOUT_Label, "",
  349.                                                                                                                    LAYOUT_Orientation, 1,
  350.                                                                                                                    LAYOUT_HorizAlignment, LALIGN_LEFT,
  351.                                                                                                                    LAYOUT_VertAlignment, LALIGN_TOP,
  352.                                                                                                                    LAYOUT_LabelPlace, BVJ_TOP_LEFT,
  353.                                                                                                                    LAYOUT_BevelState, IDS_NORMAL,
  354.                                                                                                                    GA_ID, 4,
  355.                                                                                                                    GA_GadgetHelpText, "",
  356.                                                                                                                    GA_RelVerify, TRUE,
  357.                                                                                                                    GA_GadgetHelp, TRUE,
  358.                                                                                                                    LAYOUT_AddChild, (Object *) Gadget1[6] = (Object *) SpaceObject,
  359.                                                                                                                                     GA_ID, 11,
  360.                                                                                                                                     GA_GadgetHelpText, "",
  361.                                                                                                                                     GA_RelVerify, TRUE,
  362.                                                                                                                                     GA_GadgetHelp, TRUE,
  363.                                                                                                                    End,
  364.                                                                                                                    LAYOUT_AddChild, (Object *) Gadget1[7] = (Object *) ChooserObject,
  365.                                                                                                                                     CHOOSER_Title, "Type",
  366.                                                                                                                                     CHOOSER_AutoFit, TRUE,
  367.                                                                                                                                     CHOOSER_PopUp, TRUE,
  368.                                                                                                                                     CHOOSER_MaxLabels, 10,
  369.                                                                                                                                     CHOOSER_Offset, 0,
  370.                                                                                                                                     CHOOSER_Selected, -1,
  371.                                                                                                                                     CHOOSER_Labels, (ULONG) &Chooser_Nodearray1,
  372.                                                                                                                                     GA_ID, 8,
  373.                                                                                                                                     GA_GadgetHelpText, "",
  374.                                                                                                                                     GA_RelVerify, TRUE,
  375.                                                                                                                                     GA_GadgetHelp, TRUE,
  376.                                                                                                                    End,
  377.                                                                                                                    LAYOUT_AddChild, (Object *) Gadget1[8] = (Object *) SpaceObject,
  378.                                                                                                                                     GA_ID, 17,
  379.                                                                                                                                     GA_GadgetHelpText, "",
  380.                                                                                                                                     GA_RelVerify, TRUE,
  381.                                                                                                                                     GA_GadgetHelp, TRUE,
  382.                                                                                                                    End,
  383.                                                                                                                    LAYOUT_AddChild, (Object *) Gadget1[9] = (Object *) ButtonObject,
  384.                                                                                                                                     GA_Text, "Emport ->",
  385.                                                                                                                                     BUTTON_Justification, 1,
  386.                                                                                                                                     GA_ID, 5,
  387.                                                                                                                                     GA_GadgetHelpText, "",
  388.                                                                                                                                     GA_RelVerify, TRUE,
  389.                                                                                                                                     GA_GadgetHelp, TRUE,
  390.                                                                                                                                     GA_Disabled, TRUE,
  391.                                                                                                                    End,
  392.                                                                                                                    LAYOUT_AddChild, (Object *) Gadget1[10] = (Object *) ButtonObject,
  393.                                                                                                                                     GA_Text, "<- Import",
  394.                                                                                                                                     BUTTON_Justification, 1,
  395.                                                                                                                                     GA_ID, 6,
  396.                                                                                                                                     GA_GadgetHelpText, "",
  397.                                                                                                                                     GA_RelVerify, TRUE,
  398.                                                                                                                                     GA_GadgetHelp, TRUE,
  399.                                                                                                                                     GA_Disabled, TRUE,
  400.                                                                                                                    End,
  401.                                                                                                                    LAYOUT_AddChild, (Object *) Gadget1[11] = (Object *) SpaceObject,
  402.                                                                                                                                     GA_ID, 16,
  403.                                                                                                                                     GA_GadgetHelpText, "",
  404.                                                                                                                                     GA_RelVerify, TRUE,
  405.                                                                                                                                     GA_GadgetHelp, TRUE,
  406.                                                                                                                    End,
  407.                                                                                                                    LAYOUT_AddChild, (Object *) Gadget1[12] = (Object *) ButtonObject,
  408.                                                                                                                                     GA_Text, LOCALE_DELETE,
  409.                                                                                                                                     BUTTON_Justification, 1,
  410.                                                                                                                                     GA_ID, 13,
  411.                                                                                                                                     GA_GadgetHelpText, "",
  412.                                                                                                                                     GA_RelVerify, TRUE,
  413.                                                                                                                                     GA_GadgetHelp, TRUE,
  414.                                                                                                                    End,
  415.                                                                                                                    LAYOUT_AddChild, (Object *) Gadget1[13] = (Object *) SpaceObject,
  416.                                                                                                                                     GA_ID, 15,
  417.                                                                                                                                     GA_GadgetHelpText, "",
  418.                                                                                                                                     GA_RelVerify, TRUE,
  419.                                                                                                                                     GA_GadgetHelp, TRUE,
  420.                                                                                                                    End,
  421.                                                                                                                    LAYOUT_AddChild, (Object *) Gadget1[14] = (Object *) ButtonObject,
  422.                                                                                                                                     GA_Text, "Refresh",
  423.                                                                                                                                     BUTTON_Justification, 1,
  424.                                                                                                                                     GA_ID, 7,
  425.                                                                                                                                     GA_GadgetHelpText, "",
  426.                                                                                                                                     GA_RelVerify, TRUE,
  427.                                                                                                                                     GA_GadgetHelp, TRUE,
  428.                                                                                                                    End,
  429.                                                                                                                    LAYOUT_AddChild, (Object *) Gadget1[15] = (Object *) SpaceObject,
  430.                                                                                                                                     GA_ID, 12,
  431.                                                                                                                                     GA_GadgetHelpText, "",
  432.                                                                                                                                     GA_RelVerify, TRUE,
  433.                                                                                                                                     GA_GadgetHelp, TRUE,
  434.                                                                                                                    End,
  435.                                                                                                   End,
  436.                                                                                                   LAYOUT_AddChild, (Object *) Gadget1[16] = (Object *) LayoutObject,
  437.                                                                                                                    LAYOUT_Label, "Storage",
  438.                                                                                                                    LAYOUT_Orientation, 0,
  439.                                                                                                                    LAYOUT_HorizAlignment, LALIGN_LEFT,
  440.                                                                                                                    LAYOUT_VertAlignment, LALIGN_TOP,
  441.                                                                                                                    LAYOUT_LabelPlace, BVJ_TOP_CENTER,
  442.                                                                                                                    LAYOUT_BevelState, IDS_NORMAL,
  443.                                                                                                                    GA_ID, 9,
  444.                                                                                                                    GA_GadgetHelpText, "",
  445.                                                                                                                    GA_RelVerify, TRUE,
  446.                                                                                                                    GA_GadgetHelp, TRUE,
  447.                                                                                                                    LAYOUT_AddChild, (Object *) Gadget1[17] = (Object *) ListBrowserObject,
  448.                                                                                                                                     LISTBROWSER_AutoFit, TRUE,
  449.                                                                                                                                     LISTBROWSER_ShowSelected, TRUE,
  450.                                                                                                                                     LISTBROWSER_VerticalProp, TRUE,
  451.                                                                                                                                     LISTBROWSER_HorizontalProp, TRUE,
  452.                                                                                                                                     GA_ID, 10,
  453.                                                                                                                                     GA_GadgetHelpText, "",
  454.                                                                                                                                     GA_RelVerify, TRUE,
  455.                                                                                                                                     GA_GadgetHelp, TRUE,
  456.                                                                                                                    End,
  457.                                                                                                   End,
  458.                                                                                  End,
  459.                                                                                  LAYOUT_AddChild, (Object *) Gadget1[18] = (Object *) ButtonObject,
  460.                                                                                                   GA_Text, "",
  461.                                                                                                   BUTTON_Justification, 0,
  462.                                                                                                   GA_ID, 17,
  463.                                                                                                   GA_GadgetHelpText, "",
  464.                                                                                                   GA_RelVerify, TRUE,
  465.                                                                                                   GA_GadgetHelp, TRUE,
  466.                                                                                                   GA_ReadOnly, TRUE,
  467.                                                                                  End,
  468.                                                                 End,
  469.                                             EndGroup,
  470.                             EndWindow;
  471.  
  472.                         }
  473.                         Startup();
  474.                         Emperor_OpenWindow_Window1();
  475.                         while(!terminated)
  476.                         {
  477.                             Wait(WindowSignals1);
  478.                             while((Emperor_Input = RA_HandleInput(WindowObject1, &Emperor_Code)) != WMHI_LASTMSG)
  479.                             {
  480.                                 switch(Emperor_Input & WMHI_CLASSMASK)
  481.                                 {
  482.                                     case WMHI_GADGETUP:
  483.                                         switch(Emperor_Input & WMHI_GADGETMASK)
  484.                                         {
  485.                                             case 3: Listbrowser1_GadgetUp_Event(); break;
  486.                                             case 8: Chooser1_GadgetUp_Event(); break;
  487.                                             case 5: Button1_GadgetUp_Event(); break;
  488.                                             case 6: Button2_GadgetUp_Event(); break;
  489.                                             case 13: Button4_GadgetUp_Event(); break;
  490.                                             case 7: Button3_GadgetUp_Event(); break;
  491.                                             case 10: Listbrowser2_GadgetUp_Event(); break;
  492.                                         }
  493.                                         break;
  494.                                     case WMHI_GADGETHELP:
  495.                                         switch(Emperor_Input & WMHI_GADGETMASK)
  496.                                         {
  497.                                         }
  498.                                         break;
  499.                                     case WMHI_MENUPICK:
  500.                                         switch(Emperor_Input & WMHI_MENUMASK)
  501.                                         {
  502.                                             case Menu_Information: Menu_Information_MenuPick_Event(); break;
  503.                                             case Menu_Quit: Menu_Quit_MenuPick_Event(); break;
  504.                                             case Menu_DataTypes: Menu_DataTypes_MenuPick_Event(); break;
  505.                                             case Menu_DOSDrivers: Menu_DOSDrivers_MenuPick_Event(); break;
  506.                                             case Menu_Keymaps: Menu_Keymaps_MenuPick_Event(); break;
  507.                                             case Menu_Monitors: Menu_Monitors_MenuPick_Event(); break;
  508.                                             case Menu_Printers: Menu_Printers_MenuPick_Event(); break;
  509.                                         }
  510.                                         break;
  511.                                     case WMHI_MENUHELP:
  512.                                         switch(Emperor_Input & WMHI_MENUMASK)
  513.                                         {
  514.                                         }
  515.                                         break;
  516.                                     case WMHI_CLOSEWINDOW:
  517.                                         Window1_CloseWindow_Event();
  518.                                         break;
  519.                                     case WMHI_ICONIFY:
  520.                                         break;
  521.                                     case WMHI_UNICONIFY:
  522.                                         break;
  523.                                     case WMHI_ACTIVE:
  524.                                         break;
  525.                                     case WMHI_INACTIVE:
  526.                                         break;
  527.                                     case WMHI_RAWKEY:
  528.                                         break;
  529.                                     case WMHI_VANILLAKEY:
  530.                                         break;
  531.                                     case WMHI_MOUSEBUTTONS:
  532.                                         break;
  533.                                     case WMHI_MOUSEMOVE:
  534.                                         break;
  535.                                     case WMHI_NEWSIZE:
  536.                                         break;
  537.                                     case WMHI_CHANGEWINDOW:
  538.                                         break;
  539.                                     case WMHI_DISPOSEDWINDOW:
  540.                                         break;
  541.                                     case WMHI_INTUITICK:
  542.                                         break;
  543.                                 }
  544.                             }
  545.                         }
  546.                         Shutdown();
  547.                     }
  548.                     else Emperor_Exception = 4;
  549.                 }
  550.                 else Emperor_Exception = 3;
  551.             }
  552.             else Emperor_Exception = 2;
  553.         }
  554.         else Emperor_Exception = 1;
  555.     }
  556.     if(Emperor_Exception)
  557.     {
  558.         strcpy(Emperor_ExceptionString, LOCALE_REQUEST_INITIALIZATIONERROR_BODYTITLE);
  559.         switch(Emperor_Exception)
  560.         {
  561.             case 1: strcat(Emperor_ExceptionString, LOCALE_REQUEST_INITIALIZATIONERROR_ERRRTEXT2); break;
  562.             case 2: strcat(Emperor_ExceptionString, LOCALE_REQUEST_INITIALIZATIONERROR_ERRRTEXT3); break;
  563.             case 3: strcat(Emperor_ExceptionString, LOCALE_REQUEST_INITIALIZATIONERROR_ERRRTEXT4); break;
  564.             case 4: strcat(Emperor_ExceptionString, LOCALE_REQUEST_INITIALIZATIONERROR_ERRRTEXT5); break;
  565.         }
  566.         strcat(Emperor_ExceptionString, LOCALE_REQUEST_INITIALIZATIONERROR_SOLUTION2);
  567.         EmperorRequest_InitializationErrorRequest.es_StructSize = sizeof(struct EasyStruct);
  568.         EmperorRequest_InitializationErrorRequest.es_Flags = 0L;
  569.         EmperorRequest_InitializationErrorRequest.es_Title = (UBYTE *) LOCALE_REQUEST_INITIALIZATIONERROR_TITLE;
  570.         EmperorRequest_InitializationErrorRequest.es_TextFormat = (UBYTE *) Emperor_ExceptionString;
  571.         EmperorRequest_InitializationErrorRequest.es_GadgetFormat = (UBYTE *) LOCALE_REQUEST_INITIALIZATIONERROR_GADGET;
  572.         EasyRequest(Window1, &EmperorRequest_InitializationErrorRequest, NULL, NULL);
  573.     }
  574.     Emperor_QuitProgram();
  575. }
  576.  
  577. void wbmain(struct WBStartup *Emperor_ArgMsg)
  578. {
  579.     main();
  580. }
  581.  
  582. #include <DevsManager.h>
  583.  
  584. LONG Quitrequest1(void)
  585. {
  586.     struct EasyStruct EmperorRequest_Quitrequest1;
  587.  
  588.     EmperorRequest_Quitrequest1.es_StructSize = sizeof(struct EasyStruct);
  589.     EmperorRequest_Quitrequest1.es_Flags = 0L;
  590.     EmperorRequest_Quitrequest1.es_Title = (UBYTE *) LOCALE_REQUEST_QUIT_TITLE;
  591.     EmperorRequest_Quitrequest1.es_TextFormat = (UBYTE *) LOCALE_REQUEST_QUIT_BODY;
  592.     EmperorRequest_Quitrequest1.es_GadgetFormat = (UBYTE *) LOCALE_REQUEST_QUIT_GADGET;
  593.     return(EasyRequest(Window1, &EmperorRequest_Quitrequest1, NULL, NULL));
  594. }
  595.  
  596. LONG Inforequest1(void)
  597. {
  598.     struct EasyStruct EmperorRequest_Inforequest1;
  599.  
  600.     EmperorRequest_Inforequest1.es_StructSize = sizeof(struct EasyStruct);
  601.     EmperorRequest_Inforequest1.es_Flags = 0L;
  602.     EmperorRequest_Inforequest1.es_Title = (UBYTE *) LOCALE_REQUEST_INFO_TITLE;
  603.     EmperorRequest_Inforequest1.es_TextFormat = (UBYTE *) LOCALE_REQUEST_INFO_BODY;
  604.     EmperorRequest_Inforequest1.es_GadgetFormat = (UBYTE *) LOCALE_REQUEST_INFO_GADGET;
  605.     return(EasyRequest(Window1, &EmperorRequest_Inforequest1, NULL, NULL));
  606. }
  607.  
  608. BOOL Emperor_InitProgram(void)
  609. {
  610.     BOOL Emperor_InitVar = FALSE;
  611.     BYTE Emperor_ExceptionStringLength;
  612.     char Emperor_OccuredError[50], Emperor_ExceptionString[200];
  613.     struct EasyStruct EmperorRequest_InitializationErrorRequest;
  614.  
  615.     if(!(IntuitionBase = OpenLibrary(INTUITIONLIBRARY, 39L)))
  616.     {
  617.         Emperor_InitVar = TRUE;
  618.         strcpy(Emperor_OccuredError, INTUITIONLIBRARY);
  619.     }
  620.     if(!(LocaleBase = OpenLibrary(LOCALELIBRARY, 39L)))
  621.     {
  622.         Emperor_InitVar = TRUE;
  623.         strcpy(Emperor_OccuredError, LOCALELIBRARY);
  624.     }
  625.     if(!(GadToolsBase = OpenLibrary(GADTOOLSLIBRARY, 39L)))
  626.     {
  627.         Emperor_InitVar = TRUE;
  628.         strcpy(Emperor_OccuredError, GADTOOLSLIBRARY);
  629.     }
  630.     if(!(DOSLibBase = OpenLibrary(DOSLIBRARY, 39L)))
  631.     {
  632.         Emperor_InitVar = TRUE;
  633.         strcpy(Emperor_OccuredError, DOSLIBRARY);
  634.     }
  635.     if(!(ASLBase = OpenLibrary(ASLLIBRARY, 39L)))
  636.     {
  637.         Emperor_InitVar = TRUE;
  638.         strcpy(Emperor_OccuredError, ASLLIBRARY);
  639.     }
  640.     if(!(ResourceBase = OpenLibrary(RESOURCELIBRARY, 44L)))
  641.     {
  642.         os35 = FALSE;
  643.         strcpy(Emperor_OccuredError, RESOURCELIBRARY);
  644.     }
  645.     if(!(LayoutBase = OpenLibrary(LAYOUTGADGETLIB, 44L)))
  646.     {
  647.         os35 = FALSE;
  648.         strcpy(Emperor_OccuredError, LAYOUTGADGETLIB);
  649.     }
  650.     if(!(WindowBase = OpenLibrary(WINDOWCLASSLIB, 44L)))
  651.     {
  652.         os35 = FALSE;
  653.         strcpy(Emperor_OccuredError, WINDOWCLASSLIB);
  654.     }
  655.     if(!(RequesterBase = OpenLibrary(REQUESTERCLASSLIB, 42L)))
  656.     {
  657.         os35 = FALSE;
  658.         strcpy(Emperor_OccuredError, REQUESTERCLASSLIB);
  659.     }
  660.     if(!(LabelBase = OpenLibrary(LABELIMAGELIB, 44L)))
  661.     {
  662.         os35 = FALSE;
  663.         strcpy(Emperor_OccuredError, LABELIMAGELIB);
  664.     }
  665.     if(!(ButtonBase = OpenLibrary(BUTTONGADGETLIB, 44L)))
  666.     {
  667.         os35 = FALSE;
  668.         strcpy(Emperor_OccuredError, BUTTONGADGETLIB);
  669.     }
  670.     if(!(CheckBoxBase = OpenLibrary(CHECKBOXGADGETLIB, 44L)))
  671.     {
  672.         os35 = FALSE;
  673.         strcpy(Emperor_OccuredError, CHECKBOXGADGETLIB);
  674.     }
  675.     if(!(ChooserBase = OpenLibrary(CHOOSERGADGETLIB, 44L)))
  676.     {
  677.         os35 = FALSE;
  678.         strcpy(Emperor_OccuredError, CHOOSERGADGETLIB);
  679.     }
  680.     if(!(ClickTabBase = OpenLibrary(CLICKTABGADGETLIB, 44L)))
  681.     {
  682.         os35 = FALSE;
  683.         strcpy(Emperor_OccuredError, CLICKTABGADGETLIB);
  684.     }
  685.     if(!(ColorWheelBase = OpenLibrary(COLORWHEELGADGETLIB, 44L)))
  686.     {
  687.         os35 = FALSE;
  688.         strcpy(Emperor_OccuredError, COLORWHEELGADGETLIB);
  689.     }
  690.     if(!(DateBrowserBase = OpenLibrary(DATEBROWSERGADGETLIB, 44L)))
  691.     {
  692.         os35 = FALSE;
  693.         strcpy(Emperor_OccuredError, DATEBROWSERGADGETLIB);
  694.     }
  695.     if(!(FuelGaugeBase = OpenLibrary(FUELGAUGEGADGETLIB, 44L)))
  696.     {
  697.         os35 = FALSE;
  698.         strcpy(Emperor_OccuredError, FUELGAUGEGADGETLIB);
  699.     }
  700.     if(!(GetFileBase = OpenLibrary(GETFILEGADGETLIB, 44L)))
  701.     {
  702.         os35 = FALSE;
  703.         strcpy(Emperor_OccuredError, GETFILEGADGETLIB);
  704.     }
  705.     if(!(GetFontBase = OpenLibrary(GETFONTGADGETLIB, 44L)))
  706.     {
  707.         os35 = FALSE;
  708.         strcpy(Emperor_OccuredError, GETFONTGADGETLIB);
  709.     }
  710.     if(!(GetScreenModeBase = OpenLibrary(GETSCREENMODEGADGETLIB, 44L)))
  711.     {
  712.         os35 = FALSE;
  713.         strcpy(Emperor_OccuredError, GETSCREENMODEGADGETLIB);
  714.     }
  715.     if(!(IntegerBase = OpenLibrary(INTEGERGADGETLIB, 44L)))
  716.     {
  717.         os35 = FALSE;
  718.         strcpy(Emperor_OccuredError, INTEGERGADGETLIB);
  719.     }
  720.     if(!(ListBrowserBase = OpenLibrary(LISTBROWSERGADGETLIB, 44L)))
  721.     {
  722.         os35 = FALSE;
  723.         strcpy(Emperor_OccuredError, LISTBROWSERGADGETLIB);
  724.     }
  725.     if(!(PaletteBase = OpenLibrary(PALETTEGADGETLIB, 44L)))
  726.     {
  727.         os35 = FALSE;
  728.         strcpy(Emperor_OccuredError, PALETTEGADGETLIB);
  729.     }
  730.     if(!(RadioButtonBase = OpenLibrary(RADIOBUTTONGADGETLIB, 44L)))
  731.     {
  732.         os35 = FALSE;
  733.         strcpy(Emperor_OccuredError, RADIOBUTTONGADGETLIB);
  734.     }
  735.     if(!(ScrollerBase = OpenLibrary(SCROLLERGADGETLIB, 44L)))
  736.     {
  737.         os35 = FALSE;
  738.         strcpy(Emperor_OccuredError, SCROLLERGADGETLIB);
  739.     }
  740.     if(!(SliderBase = OpenLibrary(SLIDERGADGETLIB, 44L)))
  741.     {
  742.         os35 = FALSE;
  743.         strcpy(Emperor_OccuredError, SLIDERGADGETLIB);
  744.     }
  745.     if(!(SpaceBase = OpenLibrary(SPACEGADGETLIB, 44L)))
  746.     {
  747.         os35 = FALSE;
  748.         strcpy(Emperor_OccuredError, SPACEGADGETLIB);
  749.     }
  750.     if(!(SpeedBarBase = OpenLibrary(SPEEDBARGADGETLIB, 44L)))
  751.     {
  752.         os35 = FALSE;
  753.         strcpy(Emperor_OccuredError, SPEEDBARGADGETLIB);
  754.     }
  755.     if(!(StringBase = OpenLibrary(STRINGGADGETLIB, 44L)))
  756.     {
  757.         os35 = FALSE;
  758.         strcpy(Emperor_OccuredError, STRINGGADGETLIB);
  759.     }
  760.     if(!(TapeDeckBase = OpenLibrary(TAPEDECKGADGETLIB, 40L)))
  761.     {
  762.         os35 = FALSE;
  763.         strcpy(Emperor_OccuredError, TAPEDECKGADGETLIB);
  764.     }
  765.     if(!(TextEditorBase = OpenLibrary(TEXTEDITORGADGETLIB, 15L)))
  766.     {
  767.         os35 = FALSE;
  768.         strcpy(Emperor_OccuredError, TEXTEDITORGADGETLIB);
  769.     }
  770.     Catalog = OpenCatalogA(NULL, "DevsManager.catalog", NULL);
  771.     if(Emperor_InitVar)
  772.     {
  773.         strcpy(Emperor_ExceptionString, LOCALE_REQUEST_INITIALIZATIONERROR_BODYTITLE);
  774.         strcat(Emperor_ExceptionString, LOCALE_REQUEST_INITIALIZATIONERROR_ERRRTEXT1);
  775.         Emperor_ExceptionStringLength = 0; while(Emperor_ExceptionString[Emperor_ExceptionStringLength] != NULL) Emperor_ExceptionStringLength++;
  776.         Emperor_ExceptionString[Emperor_ExceptionStringLength] = (char) 34;
  777.         Emperor_ExceptionString[Emperor_ExceptionStringLength + 1] = NULL;
  778.         strcat(Emperor_ExceptionString, Emperor_OccuredError);
  779.         Emperor_ExceptionStringLength = 0; while(Emperor_ExceptionString[Emperor_ExceptionStringLength] != NULL) Emperor_ExceptionStringLength++;
  780.         Emperor_ExceptionString[Emperor_ExceptionStringLength] = (char) 34;
  781.         Emperor_ExceptionString[Emperor_ExceptionStringLength + 1] = NULL;
  782.         strcat(Emperor_ExceptionString, LOCALE_REQUEST_INITIALIZATIONERROR_SOLUTION1);
  783.         EmperorRequest_InitializationErrorRequest.es_StructSize = sizeof(struct EasyStruct);
  784.         EmperorRequest_InitializationErrorRequest.es_Flags = 0L;
  785.         EmperorRequest_InitializationErrorRequest.es_Title = (UBYTE *) LOCALE_REQUEST_INITIALIZATIONERROR_TITLE;
  786.         EmperorRequest_InitializationErrorRequest.es_TextFormat = (UBYTE *) Emperor_ExceptionString;
  787.         EmperorRequest_InitializationErrorRequest.es_GadgetFormat = (UBYTE *) LOCALE_REQUEST_INITIALIZATIONERROR_GADGET;
  788.         EasyRequest(Window1, &EmperorRequest_InitializationErrorRequest, NULL, NULL);
  789.     }
  790.     return(Emperor_InitVar);
  791. }
  792.  
  793. void Emperor_QuitProgram(void)
  794. {
  795.     Emperor_CloseWindow_Window1();
  796.     if(WindowObject1) DisposeObject(WindowObject1);
  797.     if(AppPort) DeleteMsgPort(AppPort);
  798.     if(Menu) FreeMenus(Menu);
  799.     if(vinfo) FreeVisualInfo(vinfo);
  800.     if(Screen) UnlockPubScreen(NULL, Screen);
  801.     if(Catalog) CloseCatalog(Catalog);
  802.     if(TextEditorBase) CloseLibrary(TextEditorBase);
  803.     if(TapeDeckBase) CloseLibrary(TapeDeckBase);
  804.     if(StringBase) CloseLibrary(StringBase);
  805.     if(SpeedBarBase) CloseLibrary(SpeedBarBase);
  806.     if(SpaceBase) CloseLibrary(SpaceBase);
  807.     if(SliderBase) CloseLibrary(SliderBase);
  808.     if(ScrollerBase) CloseLibrary(ScrollerBase);
  809.     if(RadioButtonBase) CloseLibrary(RadioButtonBase);
  810.     if(PaletteBase) CloseLibrary(PaletteBase);
  811.     if(ListBrowserBase) CloseLibrary(ListBrowserBase);
  812.     if(IntegerBase) CloseLibrary(IntegerBase);
  813.     if(GetScreenModeBase) CloseLibrary(GetScreenModeBase);
  814.     if(GetFontBase) CloseLibrary(GetFontBase);
  815.     if(GetFileBase) CloseLibrary(GetFileBase);
  816.     if(FuelGaugeBase) CloseLibrary(FuelGaugeBase);
  817.     if(DateBrowserBase) CloseLibrary(DateBrowserBase);
  818.     if(ColorWheelBase) CloseLibrary(ColorWheelBase);
  819.     if(ClickTabBase) CloseLibrary(ClickTabBase);
  820.     if(ChooserBase) CloseLibrary(ChooserBase);
  821.     if(CheckBoxBase) CloseLibrary(CheckBoxBase);
  822.     if(ButtonBase) CloseLibrary(ButtonBase);
  823.     if(LabelBase) CloseLibrary(LabelBase);
  824.     if(RequesterBase) CloseLibrary(RequesterBase);
  825.     if(WindowBase) CloseLibrary(WindowBase);
  826.     if(LayoutBase) CloseLibrary(LayoutBase);
  827.     if(ResourceBase) CloseLibrary(ResourceBase);
  828.     if(ASLBase) CloseLibrary(ASLBase);
  829.     if(DOSLibBase) CloseLibrary(DOSLibBase);
  830.     if(GadToolsBase) CloseLibrary(GadToolsBase);
  831.     if(LocaleBase) CloseLibrary(LocaleBase);
  832.     if(IntuitionBase) CloseLibrary(IntuitionBase);
  833.     exit(0);
  834. }
  835.  
  836. void Emperor_CloseWindow_Window1(void)
  837. {
  838.     if(Menu) ClearMenuStrip(Window1);
  839.     DoMethod(WindowObject1, WM_CLOSE, NULL);
  840.     Window1 = NULL;
  841.     WindowSignals1 = 0L;
  842. }
  843.  
  844. void Emperor_IconifyWindow_Window1(void)
  845. {
  846.     if(Menu) ClearMenuStrip(Window1);
  847.     DoMethod(WindowObject1, WM_ICONIFY, NULL);
  848.     Window1 = NULL;
  849.     WindowSignals1 = 0L;
  850. }
  851.  
  852. struct Window *Emperor_OpenWindow_Window1(void)
  853. {
  854.     Window1 = RA_OpenWindow(WindowObject1);
  855.     GetAttr(WINDOW_SigMask, WindowObject1, &WindowSignals1);
  856.     SetMenuStrip(Window1, Menu);
  857.     Window1_ShowWindow_Event();
  858.     return(Window1);
  859. }
  860.  
  861. struct Window *Emperor_UniconifyWindow_Window1(void)
  862. {
  863.     return(Emperor_OpenWindow_Window1());
  864. }
  865.  
  866. BOOL Emperor_GetMenuItemAttr(UWORD Emperor_MenuObject, UWORD Emperor_MenuFlagMask)
  867. {
  868.     struct MenuItem *Emperor_MenuItem = NULL;
  869.  
  870.     Emperor_MenuItem = ItemAddress(Menu, Emperor_MenuObject);
  871.     if(Emperor_MenuItem->Flags & Emperor_MenuFlagMask) return(TRUE);
  872.     else return(FALSE);
  873. }
  874.  
  875. void Emperor_SetMenuItemAttr(UWORD Emperor_MenuObject, UWORD Emperor_MenuFlagMask, BOOL Emperor_SetReset)
  876. {
  877.     struct MenuItem *Emperor_MenuItem = NULL;
  878.  
  879.     Emperor_MenuItem = ItemAddress(Menu, Emperor_MenuObject);
  880.     if(Emperor_SetReset) Emperor_MenuItem->Flags += Emperor_MenuFlagMask;
  881.     else Emperor_MenuItem->Flags -= Emperor_MenuFlagMask;
  882. }
  883.  
  884. STRPTR Emperor_GetGadgetAttr(struct Gadget *Emperor_GadgetName)
  885. {
  886.     LONG Emperor_GadgetAttrBuffer, Emperor_GadgetCounter;
  887.     STRPTR Emperor_GadgetAttrReturn = "";
  888.  
  889.     Emperor_GadgetAttrBuffer = 0L;
  890.     for(Emperor_GadgetCounter = 0;Emperor_GadgetCounter < 255;Emperor_GadgetCounter++)
  891.     {
  892.         if(Gadget1[Emperor_GadgetCounter] == Emperor_GadgetName)
  893.         {
  894.             switch(Emperor_Gadgetkind1[Emperor_GadgetCounter])
  895.             {
  896.                 case 0:
  897.                     GetAttr(GA_Selected, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  898.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  899.                     break;
  900.                 case 1:
  901.                     GetAttr(GA_Selected, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  902.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  903.                     break;
  904.                 case 2:
  905.                     GetAttr(CHOOSER_Selected, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  906.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  907.                     break;
  908.                 case 3:
  909.                     GetAttr(CLICKTAB_Current, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  910.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  911.                     break;
  912.                 case 6:
  913.                     GetAttr(FUELGAUGE_Level, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  914.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  915.                     break;
  916.                 case 10:
  917.                     GetAttr(INTEGER_Number, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  918.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  919.                     break;
  920.                 case 13:
  921.                     GetAttr(LISTBROWSER_Selected, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  922.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  923.                     break;
  924.                 case 14:
  925.                     GetAttr(PALETTE_Colour, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  926.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  927.                     break;
  928.                 case 15:
  929.                     GetAttr(RADIOBUTTON_Selected, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  930.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  931.                     break;
  932.                 case 16:
  933.                     GetAttr(SCROLLER_Top, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  934.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  935.                     break;
  936.                 case 17:
  937.                     GetAttr(SLIDER_Level, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  938.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  939.                     break;
  940.                 case 19:
  941.                     GetAttr(SPEEDBAR_Selected, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  942.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  943.                     break;
  944.                 case 20:
  945.                     GetAttr(STRINGA_TextVal, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  946.                     strcpy(Emperor_GadgetAttrReturn, (char *) Emperor_GadgetAttrBuffer);
  947.                     break;
  948.                 case 22:
  949.                     GetAttr(GA_TEXTEDITOR_Contents, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  950.                     strcpy(Emperor_GadgetAttrReturn, (char *) Emperor_GadgetAttrBuffer);
  951.                     break;
  952.             }
  953.             break;
  954.         }
  955.     }
  956.     return(Emperor_GadgetAttrReturn);
  957. }
  958.  
  959. void Emperor_SetGadgetAttr(struct Gadget *Emperor_GadgetName, STRPTR Emperor_GadgetValue)
  960. {
  961.     LONG Emperor_GadgetAttrBuffer, Emperor_GadgetCounter;
  962.     struct Window *Emperor_Whichwindow = NULL;
  963.  
  964.     Emperor_GadgetAttrBuffer = 0L;
  965.     for(Emperor_GadgetCounter = 0;Emperor_GadgetCounter < 255;Emperor_GadgetCounter++)
  966.     {
  967.         if(Gadget1[Emperor_GadgetCounter] == Emperor_GadgetName)
  968.         {
  969.             Emperor_Whichwindow = Window1;
  970.             switch(Emperor_Gadgetkind1[Emperor_GadgetCounter])
  971.             {
  972.                 case 0:
  973.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_Selected, stringtoint(Emperor_GadgetValue), TAG_DONE);
  974.                     break;
  975.                 case 1:
  976.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_Selected, stringtoint(Emperor_GadgetValue), TAG_DONE);
  977.                     break;
  978.                 case 2:
  979.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, CHOOSER_Selected, stringtoint(Emperor_GadgetValue), TAG_DONE);
  980.                     break;
  981.                 case 3:
  982.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, CLICKTAB_Current, stringtoint(Emperor_GadgetValue), TAG_DONE);
  983.                     break;
  984.                 case 6:
  985.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, FUELGAUGE_Level, stringtoint(Emperor_GadgetValue), TAG_DONE);
  986.                     break;
  987.                 case 10:
  988.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, INTEGER_Number, stringtoint(Emperor_GadgetValue), TAG_DONE);
  989.                     break;
  990.                 case 13:
  991.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, LISTBROWSER_Selected, stringtoint(Emperor_GadgetValue), TAG_DONE);
  992.                     break;
  993.                 case 14:
  994.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, PALETTE_Colour, stringtoint(Emperor_GadgetValue), TAG_DONE);
  995.                     break;
  996.                 case 15:
  997.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, RADIOBUTTON_Selected, stringtoint(Emperor_GadgetValue), TAG_DONE);
  998.                     break;
  999.                 case 16:
  1000.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, SCROLLER_Top, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1001.                     break;
  1002.                 case 17:
  1003.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, SLIDER_Level, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1004.                     break;
  1005.                 case 19:
  1006.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, SPEEDBAR_Selected, Emperor_GadgetValue, TAG_DONE);
  1007.                     break;
  1008.                 case 20:
  1009.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, STRINGA_TextVal, Emperor_GadgetValue, TAG_DONE);
  1010.                     break;
  1011.                 case 22:
  1012.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_TEXTEDITOR_Contents, Emperor_GadgetValue, TAG_DONE);
  1013.                     break;
  1014.             }
  1015.             if(Emperor_GadgetAttrBuffer != 0) RefreshGList(Emperor_GadgetName, Emperor_Whichwindow, NULL, 1);
  1016.             break;
  1017.         }
  1018.     }
  1019. }
  1020.  
  1021. STRPTR Emperor_GetGadgetAttrComplex(struct Gadget *Emperor_GadgetName, ULONG Emperor_GadgetFlagMask)
  1022. {
  1023.     LONG Emperor_GadgetAttrBuffer, Emperor_GadgetCounter;
  1024.     STRPTR Emperor_GadgetAttrReturn = "";
  1025.  
  1026.     Emperor_GadgetAttrBuffer = 0L;
  1027.     for(Emperor_GadgetCounter = 0;Emperor_GadgetCounter < 255;Emperor_GadgetCounter++)
  1028.     {
  1029.         if(Gadget1[Emperor_GadgetCounter] == Emperor_GadgetName)
  1030.         {
  1031.             GetAttr(Emperor_GadgetFlagMask, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1032.             switch(Emperor_Gadgetkind1[Emperor_GadgetCounter])
  1033.             {
  1034.                 case 0:
  1035.                     if(Emperor_GadgetFlagMask == GA_Text) strcpy(Emperor_GadgetAttrReturn, (char *) Emperor_GadgetAttrBuffer);
  1036.                     else strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1037.                     break;
  1038.                 case 1:
  1039.                     if(Emperor_GadgetFlagMask == GA_Text) strcpy(Emperor_GadgetAttrReturn, (char *) Emperor_GadgetAttrBuffer);
  1040.                     else strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1041.                     break;
  1042.                 case 2:
  1043.                     if(Emperor_GadgetFlagMask == CHOOSER_Title) strcpy(Emperor_GadgetAttrReturn, (char *) Emperor_GadgetAttrBuffer);
  1044.                     else strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1045.                     break;
  1046.                 case 3: strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer)); break;
  1047.                 case 4:
  1048.                     if(Emperor_GadgetFlagMask == WHEEL_Abbrv) strcpy(Emperor_GadgetAttrReturn, (char *) Emperor_GadgetAttrBuffer);
  1049.                     else strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1050.                     break;
  1051.                 case 5:
  1052.                     if(Emperor_GadgetFlagMask == DATEBROWSER_DayTitles) strcpy(Emperor_GadgetAttrReturn, (char *) Emperor_GadgetAttrBuffer);
  1053.                     else strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1054.                     break;
  1055.                 case 6:
  1056.                     if(Emperor_GadgetFlagMask == GA_Text) strcpy(Emperor_GadgetAttrReturn, (char *) Emperor_GadgetAttrBuffer);
  1057.                     else strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1058.                     break;
  1059.                 case 7:
  1060.                     if((Emperor_GadgetFlagMask == GETFILE_TitleText) || (Emperor_GadgetFlagMask == GETFILE_File) || (Emperor_GadgetFlagMask == GETFILE_Drawer) || (Emperor_GadgetFlagMask == GETFILE_FullFile) || (Emperor_GadgetFlagMask == GETFILE_Pattern) || (Emperor_GadgetFlagMask == GETFILE_AcceptPattern) || (Emperor_GadgetFlagMask == GETFILE_RejectPattern)) strcpy(Emperor_GadgetAttrReturn, (char *) Emperor_GadgetAttrBuffer);
  1061.                     else strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1062.                     break;
  1063.                 case 8:
  1064.                     if(Emperor_GadgetFlagMask == GETFONT_TitleText) strcpy(Emperor_GadgetAttrReturn, (char *) Emperor_GadgetAttrBuffer);
  1065.                     else strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1066.                     break;
  1067.                 case 9:
  1068.                     if(Emperor_GadgetFlagMask == GETSCREENMODE_TitleText) strcpy(Emperor_GadgetAttrReturn, (char *) Emperor_GadgetAttrBuffer);
  1069.                     else strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1070.                     break;
  1071.                 case 10: strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer)); break;
  1072.                 case 13: strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer)); break;
  1073.                 case 14: strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer)); break;
  1074.                 case 15: strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer)); break;
  1075.                 case 16: strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer)); break;
  1076.                 case 17: strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer)); break;
  1077.                 case 18: strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer)); break;
  1078.                 case 19: strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer)); break;
  1079.                 case 20:
  1080.                     if((Emperor_GadgetFlagMask == STRINGA_TextVal) || (Emperor_GadgetFlagMask == STRINGA_Buffer) || (Emperor_GadgetFlagMask == STRINGA_UndoBuffer) || (Emperor_GadgetFlagMask == STRINGA_WorkBuffer)) strcpy(Emperor_GadgetAttrReturn, (char *) Emperor_GadgetAttrBuffer);
  1081.                     else strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1082.                     break;
  1083.                 case 21: strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer)); break;
  1084.                 case 22:
  1085.                     if(Emperor_GadgetFlagMask == GA_TEXTEDITOR_Contents) strcpy(Emperor_GadgetAttrReturn, (char *) Emperor_GadgetAttrBuffer);
  1086.                     else strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1087.                     break;
  1088.             }
  1089.             break;
  1090.         }
  1091.     }
  1092.     return(Emperor_GadgetAttrReturn);
  1093. }
  1094.  
  1095. void Emperor_SetGadgetAttrComplex(struct Gadget *Emperor_GadgetName, ULONG Emperor_GadgetFlagMask, STRPTR Emperor_GadgetValue)
  1096. {
  1097.     LONG Emperor_GadgetAttrBuffer, Emperor_GadgetCounter;
  1098.     struct Window *Emperor_Whichwindow = NULL;
  1099.  
  1100.     Emperor_GadgetAttrBuffer = 0L;
  1101.     for(Emperor_GadgetCounter = 0;Emperor_GadgetCounter < 255;Emperor_GadgetCounter++)
  1102.     {
  1103.         if(Gadget1[Emperor_GadgetCounter] == Emperor_GadgetName)
  1104.         {
  1105.             Emperor_Whichwindow = Window1;
  1106.             switch(Emperor_Gadgetkind1[Emperor_GadgetCounter])
  1107.             {
  1108.                 case 0:
  1109.                     if(Emperor_GadgetFlagMask == GA_Text) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_Text, Emperor_GadgetValue, TAG_DONE);
  1110.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1111.                     break;
  1112.                 case 1:
  1113.                     if(Emperor_GadgetFlagMask == GA_Text) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_Text, Emperor_GadgetValue, TAG_DONE);
  1114.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1115.                     break;
  1116.                 case 2:
  1117.                     if(Emperor_GadgetFlagMask == CHOOSER_Title) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, CHOOSER_Title, Emperor_GadgetValue, TAG_DONE);
  1118.                     else
  1119.                     {
  1120.                         if(Emperor_GadgetFlagMask == CHOOSER_Labels)
  1121.                         {
  1122.                             SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, CHOOSER_Labels, (ULONG) ~0, TAG_DONE);
  1123.                             if(Emperor_GadgetValue != NULL) SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, CHOOSER_Labels, Emperor_GadgetValue, TAG_DONE);
  1124.                             Emperor_GadgetAttrBuffer = 1;
  1125.                         }
  1126.                         else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1127.                     }
  1128.                     break;
  1129.                 case 3:
  1130.                     if(Emperor_GadgetFlagMask == CLICKTAB_Labels)
  1131.                     {
  1132.                         SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, CLICKTAB_Labels, (ULONG) ~0, TAG_DONE);
  1133.                         if(Emperor_GadgetValue != NULL) SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, CLICKTAB_Labels, Emperor_GadgetValue, TAG_DONE);
  1134.                         Emperor_GadgetAttrBuffer = 1;
  1135.                     }
  1136.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1137.                     break;
  1138.                 case 4:
  1139.                     if(Emperor_GadgetFlagMask == WHEEL_Abbrv) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, WHEEL_Abbrv, Emperor_GadgetValue, TAG_DONE);
  1140.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1141.                     break;
  1142.                 case 5:
  1143.                     if(Emperor_GadgetFlagMask == DATEBROWSER_DayTitles) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, DATEBROWSER_DayTitles, Emperor_GadgetValue, TAG_DONE);
  1144.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1145.                     break;
  1146.                 case 6:
  1147.                     if(Emperor_GadgetFlagMask == GA_Text) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_Text, Emperor_GadgetValue, TAG_DONE);
  1148.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1149.                     break;
  1150.                 case 7:
  1151.                     if((Emperor_GadgetFlagMask == GETFILE_TitleText) || (Emperor_GadgetFlagMask == GETFILE_File) || (Emperor_GadgetFlagMask == GETFILE_Drawer) || (Emperor_GadgetFlagMask == GETFILE_FullFile) || (Emperor_GadgetFlagMask == GETFILE_Pattern) || (Emperor_GadgetFlagMask == GETFILE_AcceptPattern) || (Emperor_GadgetFlagMask == GETFILE_RejectPattern)) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, Emperor_GadgetValue, TAG_DONE);
  1152.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1153.                     break;
  1154.                 case 8:
  1155.                     if(Emperor_GadgetFlagMask == GETFONT_TitleText) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GETFONT_TitleText, Emperor_GadgetValue, TAG_DONE);
  1156.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1157.                     break;
  1158.                 case 9:
  1159.                     if(Emperor_GadgetFlagMask == GETSCREENMODE_TitleText) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GETSCREENMODE_TitleText, Emperor_GadgetValue, TAG_DONE);
  1160.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1161.                     break;
  1162.                 case 10: Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE); break;
  1163.                 case 13:
  1164.                     if(Emperor_GadgetFlagMask == LISTBROWSER_Labels)
  1165.                     {
  1166.                         SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, LISTBROWSER_Labels, (ULONG) ~0, TAG_DONE);
  1167.                         if(Emperor_GadgetValue != NULL) SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, LISTBROWSER_Labels, Emperor_GadgetValue, TAG_DONE);
  1168.                         Emperor_GadgetAttrBuffer = 1;
  1169.                     }
  1170.                     else
  1171.                     {
  1172.                         if(Emperor_GadgetFlagMask == LISTBROWSER_ColumnInfo)
  1173.                         {
  1174.                             SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, LISTBROWSER_ColumnInfo, (ULONG) ~0, TAG_DONE);
  1175.                             if(Emperor_GadgetValue != NULL) SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, LISTBROWSER_ColumnInfo, Emperor_GadgetValue, TAG_DONE);
  1176.                             Emperor_GadgetAttrBuffer = 1;
  1177.                         }
  1178.                         else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1179.                     }
  1180.                     break;
  1181.                 case 14: Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE); break;
  1182.                 case 15:
  1183.                     if(Emperor_GadgetFlagMask == RADIOBUTTON_Labels)
  1184.                     {
  1185.                         SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, RADIOBUTTON_Labels, (ULONG) ~0, TAG_DONE);
  1186.                         if(Emperor_GadgetValue != NULL) SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, RADIOBUTTON_Labels, Emperor_GadgetValue, TAG_DONE);
  1187.                         Emperor_GadgetAttrBuffer = 1;
  1188.                     }
  1189.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1190.                     break;
  1191.                 case 16: Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE); break;
  1192.                 case 17: Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE); break;
  1193.                 case 18: Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE); break;
  1194.                 case 19: Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE); break;
  1195.                 case 20:
  1196.                     if((Emperor_GadgetFlagMask == STRINGA_TextVal) || (Emperor_GadgetFlagMask == STRINGA_Buffer) || (Emperor_GadgetFlagMask == STRINGA_UndoBuffer) || (Emperor_GadgetFlagMask == STRINGA_WorkBuffer)) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, Emperor_GadgetValue, TAG_DONE);
  1197.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1198.                     break;
  1199.                 case 21: Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE); break;
  1200.                 case 22:
  1201.                     if(Emperor_GadgetFlagMask == GA_TEXTEDITOR_Contents) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_TEXTEDITOR_Contents, Emperor_GadgetValue, TAG_DONE);
  1202.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1203.                     break;
  1204.             }
  1205.             if(Emperor_GadgetAttrBuffer != 0) RefreshGList(Emperor_GadgetName, Emperor_Whichwindow, NULL, 1);
  1206.             break;
  1207.         }
  1208.     }
  1209. }
  1210.  
  1211. BOOL Emperor_GetGadgetDisabledAttr(struct Gadget *Emperor_GadgetName)
  1212. {
  1213.     LONG Emperor_GadgetAttrBuffer, Emperor_GadgetCounter;
  1214.     BOOL Emperor_GadgetAttrReturn;
  1215.  
  1216.     Emperor_GadgetAttrBuffer = 0L;
  1217.     for(Emperor_GadgetCounter = 0;Emperor_GadgetCounter < 255;Emperor_GadgetCounter++)
  1218.     {
  1219.         if(Gadget1[Emperor_GadgetCounter] == Emperor_GadgetName)
  1220.         {
  1221.             GetAttr(GA_Disabled, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1222.             break;
  1223.         }
  1224.     }
  1225.     Emperor_GadgetAttrReturn = Emperor_GadgetAttrBuffer;
  1226.     return(Emperor_GadgetAttrReturn);
  1227. }
  1228.  
  1229. void Emperor_SetGadgetDisabledAttr(struct Gadget *Emperor_GadgetName, BOOL Emperor_GadgetValue)
  1230. {
  1231.     LONG Emperor_GadgetAttrBuffer, Emperor_GadgetCounter;
  1232.     struct Window *Emperor_Whichwindow = NULL;
  1233.  
  1234.     Emperor_GadgetAttrBuffer = 0L;
  1235.     for(Emperor_GadgetCounter = 0;Emperor_GadgetCounter < 255;Emperor_GadgetCounter++)
  1236.     {
  1237.         if(Gadget1[Emperor_GadgetCounter] == Emperor_GadgetName)
  1238.         {
  1239.             Emperor_Whichwindow = Window1;
  1240.             Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_Disabled, Emperor_GadgetValue, TAG_DONE);
  1241.             if(Emperor_GadgetAttrBuffer != 0) RefreshGList(Emperor_GadgetName, Emperor_Whichwindow, NULL, 1);
  1242.             break;
  1243.         }
  1244.     }
  1245. }
  1246.  
  1247. BOOL Emperor_GetGadgetAttrReadOnly(struct Gadget *Emperor_GadgetName)
  1248. {
  1249.     LONG Emperor_GadgetAttrBuffer, Emperor_GadgetCounter;
  1250.     BOOL Emperor_GadgetAttrReturn;
  1251.  
  1252.     Emperor_GadgetAttrBuffer = 0L;
  1253.     for(Emperor_GadgetCounter = 0;Emperor_GadgetCounter < 255;Emperor_GadgetCounter++)
  1254.     {
  1255.         if(Gadget1[Emperor_GadgetCounter] == Emperor_GadgetName)
  1256.         {
  1257.             GetAttr(GA_ReadOnly, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1258.             break;
  1259.         }
  1260.     }
  1261.     Emperor_GadgetAttrReturn = Emperor_GadgetAttrBuffer;
  1262.     return(Emperor_GadgetAttrReturn);
  1263. }
  1264.  
  1265. void Emperor_SetGadgetReadOnlyAttr(struct Gadget *Emperor_GadgetName, BOOL Emperor_GadgetValue)
  1266. {
  1267.     LONG Emperor_GadgetAttrBuffer, Emperor_GadgetCounter;
  1268.     struct Window *Emperor_Whichwindow = NULL;
  1269.  
  1270.     Emperor_GadgetAttrBuffer = 0L;
  1271.     for(Emperor_GadgetCounter = 0;Emperor_GadgetCounter < 255;Emperor_GadgetCounter++)
  1272.     {
  1273.         if(Gadget1[Emperor_GadgetCounter] == Emperor_GadgetName)
  1274.         {
  1275.             Emperor_Whichwindow = Window1;
  1276.             Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_ReadOnly, Emperor_GadgetValue, TAG_DONE);
  1277.             if(Emperor_GadgetAttrBuffer != 0) RefreshGList(Emperor_GadgetName, Emperor_Whichwindow, NULL, 1);
  1278.             break;
  1279.         }
  1280.     }
  1281. }
  1282.  
  1283. void Emperor_ActivateGadget(struct Gadget *Emperor_GadgetName)
  1284. {
  1285.     LONG Emperor_GadgetCounter;
  1286.     struct Window *Emperor_Whichwindow = NULL;
  1287.  
  1288.     for(Emperor_GadgetCounter = 0;Emperor_GadgetCounter < 255;Emperor_GadgetCounter++)
  1289.     {
  1290.         if(Gadget1[Emperor_GadgetCounter] == Emperor_GadgetName)
  1291.         {
  1292.             Emperor_Whichwindow = Window1;
  1293.             break;
  1294.         }
  1295.     }
  1296.     ActivateGadget(Emperor_GadgetName, Emperor_Whichwindow, NULL);
  1297. }
  1298.  
  1299. void Emperor_RethinkLayout(struct Gadget *Emperor_GadgetName)
  1300. {
  1301.     LONG Emperor_GadgetCounter;
  1302.     struct Window *Emperor_Whichwindow = NULL;
  1303.  
  1304.     for(Emperor_GadgetCounter = 0;Emperor_GadgetCounter < 255;Emperor_GadgetCounter++)
  1305.     {
  1306.         if(Gadget1[Emperor_GadgetCounter] == Emperor_GadgetName)
  1307.         {
  1308.             Emperor_Whichwindow = Window1;
  1309.             break;
  1310.         }
  1311.     }
  1312.     RethinkLayout(Emperor_GadgetName, Emperor_Whichwindow, NULL, TRUE);
  1313. }
  1314.  
  1315. void Emperor_RefreshGList(struct Gadget *Emperor_GadgetName, WORD Emperor_NumberRefresh)
  1316. {
  1317.     LONG Emperor_GadgetCounter;
  1318.     struct Window *Emperor_Whichwindow = NULL;
  1319.  
  1320.     for(Emperor_GadgetCounter = 0;Emperor_GadgetCounter < 255;Emperor_GadgetCounter++)
  1321.     {
  1322.         if(Gadget1[Emperor_GadgetCounter] == Emperor_GadgetName)
  1323.         {
  1324.             Emperor_Whichwindow = Window1;
  1325.             break;
  1326.         }
  1327.     }
  1328.     RefreshGList(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_NumberRefresh);
  1329. }
  1330.  
  1331. void Emperor_ChangeWindowPosition(struct Window *Emperor_ApplicationWindow, WORD Emperor_Left, WORD Emperor_Top)
  1332. {
  1333.     WORD Emperor_Width, Emperor_Height;
  1334.  
  1335.     Emperor_Width = Emperor_ApplicationWindow->Width;
  1336.     Emperor_Height = Emperor_ApplicationWindow->Height;
  1337.     ChangeWindowBox(Emperor_ApplicationWindow, Emperor_Left, Emperor_Top, Emperor_Width, Emperor_Height);
  1338. }
  1339.  
  1340. void Emperor_ChangeWindowSize(struct Window *Emperor_ApplicationWindow, WORD Emperor_Width, WORD Emperor_Height)
  1341. {
  1342.     WORD Emperor_Left, Emperor_Top;
  1343.  
  1344.     Emperor_Left = Emperor_ApplicationWindow->LeftEdge;
  1345.     Emperor_Top = Emperor_ApplicationWindow->TopEdge;
  1346.     ChangeWindowBox(Emperor_ApplicationWindow, Emperor_Left, Emperor_Top, Emperor_Width, Emperor_Height);
  1347. }
  1348.  
  1349. void Emperor_SetWindowBusyPointer(struct Window *Emperor_ApplicationWindow, BOOL Emperor_SetReset)
  1350. {
  1351.     if(Emperor_SetReset) SetWindowPointer(Emperor_ApplicationWindow, WA_BusyPointer, TRUE, WA_PointerDelay, TRUE, TAG_DONE);
  1352.     else SetWindowPointer(Emperor_ApplicationWindow, TAG_DONE);
  1353. }
  1354.  
  1355. void Emperor_SetWindowTitle(struct Window *Emperor_ApplicationWindow, STRPTR Emperor_Title)
  1356. {
  1357.     SetWindowTitles(Emperor_ApplicationWindow, (UBYTE *) Emperor_Title, ((UBYTE *) ~0));
  1358. }
  1359.  
  1360. void Emperor_SetScreenTitle(struct Window *Emperor_ApplicationWindow, STRPTR Emperor_Title)
  1361. {
  1362.     SetWindowTitles(Emperor_ApplicationWindow, ((UBYTE *) ~0), (UBYTE *) Emperor_Title);
  1363. }
  1364.  
  1365. void Emperor_AllocChooserNode(struct List *Emperor_List, char **Emperor_Labels, WORD *Emperor_Attributes)
  1366. {
  1367.     WORD Emperor_Counter1 = 0;
  1368.     struct Node *Emperor_Node;
  1369.  
  1370.     if(os35)
  1371.     {
  1372.         NewList(Emperor_List);
  1373.         while(*Emperor_Labels)
  1374.         {
  1375.             Emperor_Node = AllocChooserNode(CNA_Text, *Emperor_Labels, CNA_Disabled, Emperor_Attributes[Emperor_Counter1], CNA_ReadOnly, Emperor_Attributes[Emperor_Counter1 + 1], TAG_DONE);
  1376.             AddTail(Emperor_List, Emperor_Node);
  1377.             Emperor_Labels++;
  1378.             Emperor_Counter1 += 12;
  1379.         }
  1380.     }
  1381. }
  1382.  
  1383. void Emperor_AllocClicktabNode(struct List *Emperor_List, char **Emperor_Labels, WORD *Emperor_Attributes)
  1384. {
  1385.     WORD Emperor_Counter1 = 0, Emperor_Counter2 = 0;
  1386.     struct Node *Emperor_Node;
  1387.  
  1388.     if(os35)
  1389.     {
  1390.         NewList(Emperor_List);
  1391.         while(*Emperor_Labels)
  1392.         {
  1393.             Emperor_Node = AllocClickTabNode(TNA_Text, *Emperor_Labels, TNA_Disabled, Emperor_Attributes[Emperor_Counter1], TNA_Number, Emperor_Counter2, TAG_DONE);
  1394.             AddTail(Emperor_List, Emperor_Node);
  1395.             Emperor_Labels++;
  1396.             Emperor_Counter1 += 12;
  1397.             Emperor_Counter2++;
  1398.         }
  1399.     }
  1400. }
  1401.  
  1402. void Emperor_AllocListbrowserNode(struct List *Emperor_List, char **Emperor_Labels, WORD *Emperor_Attributes)
  1403. {
  1404.     WORD Emperor_Counter1 = 0, Emperor_Counter2 = 0;
  1405.     struct Node *Emperor_Node;
  1406.  
  1407.     if(os35)
  1408.     {
  1409.         NewList(Emperor_List);
  1410.         while(*Emperor_Labels)
  1411.         {
  1412.             Emperor_Counter2 = 0;
  1413.             if(Emperor_Attributes[Emperor_Counter1 + 1]) Emperor_Counter2 += 1;
  1414.             if(Emperor_Attributes[Emperor_Counter1 + 2]) Emperor_Counter2 += 4;
  1415.             if(Emperor_Attributes[Emperor_Counter1 + 3]) Emperor_Counter2 += 8;
  1416.             if(Emperor_Attributes[Emperor_Counter1 + 4]) Emperor_Counter2 += 16;
  1417.             Emperor_Node = AllocListBrowserNode(1, LBNCA_Text, *Emperor_Labels, LBNCA_CopyText, TRUE, LBNA_Generation, Emperor_Attributes[Emperor_Counter1 + 10], LBNA_Column, Emperor_Attributes[Emperor_Counter1 + 11], LBNA_Flags, Emperor_Counter2, LBNA_Selected, Emperor_Attributes[Emperor_Counter1 + 5], LBNA_CheckBox, Emperor_Attributes[Emperor_Counter1 + 6], LBNA_Checked, Emperor_Attributes[Emperor_Counter1 + 7], TAG_DONE);
  1418.             AddTail(Emperor_List, Emperor_Node);
  1419.             Emperor_Labels++;
  1420.             Emperor_Counter1 += 12;
  1421.         }
  1422.     }
  1423. }
  1424.  
  1425. void Emperor_AllocListbrowserGadToolsNode(struct List *Emperor_List, char **Emperor_Labels)
  1426. {
  1427.     struct Node *Emperor_Node;
  1428.     struct Remember *Emperor_RememberKey;
  1429.  
  1430.     NewList(Emperor_List);
  1431.     while(*Emperor_Labels)
  1432.     {
  1433.         Emperor_Node = (struct Node *) AllocRemember(&Emperor_RememberKey, sizeof(struct Node), MEMF_CLEAR);
  1434.         Emperor_Node->ln_Name = *Emperor_Labels;
  1435.         AddTail(Emperor_List, Emperor_Node);
  1436.         Emperor_Labels++;
  1437.     }
  1438. }
  1439.  
  1440. void Emperor_AllocRadiobuttonNode(struct List *Emperor_List, char **Emperor_Labels, WORD *Emperor_Attributes)
  1441. {
  1442.     struct Node *Emperor_Node;
  1443.  
  1444.     if(os35)
  1445.     {
  1446.         NewList(Emperor_List);
  1447.         while(*Emperor_Labels)
  1448.         {
  1449.             Emperor_Node = AllocRadioButtonNode(1, RBNA_Labels, *Emperor_Labels, TAG_DONE);
  1450.             AddTail(Emperor_List, Emperor_Node);
  1451.             Emperor_Labels++;
  1452.         }
  1453.     }
  1454. }
  1455.  
  1456. LONG stringlength(STRPTR Emperor_StringBuffer)
  1457. {
  1458.     LONG Emperor_Counter = 0;
  1459.  
  1460.     while(Emperor_StringBuffer[Emperor_Counter] != NULL) Emperor_Counter++;
  1461.     return(Emperor_Counter);
  1462. }
  1463.  
  1464. LONG stringtoint(STRPTR Emperor_StringBuffer)
  1465. {
  1466.     BOOL Emperor_NegativeBuffer = FALSE;
  1467.     BYTE Emperor_NumberBuffer = 0;
  1468.     BYTE Emperor_StringLength = 0;
  1469.     LONG Emperor_ReturnBuffer = 0;
  1470.  
  1471.     if(*Emperor_StringBuffer == '-')
  1472.     {
  1473.         Emperor_StringBuffer++;
  1474.         Emperor_NegativeBuffer = TRUE;
  1475.     }
  1476.     if(*Emperor_StringBuffer == '0') Emperor_ReturnBuffer = 0;
  1477.     else
  1478.     {
  1479.         Emperor_StringLength = stringlength(Emperor_StringBuffer);
  1480.         for(;Emperor_StringLength > 0;Emperor_StringLength--)
  1481.         {
  1482.             Emperor_NumberBuffer = 0;
  1483.             if(*Emperor_StringBuffer == '1') Emperor_NumberBuffer = 1;
  1484.             if(*Emperor_StringBuffer == '2') Emperor_NumberBuffer = 2;
  1485.             if(*Emperor_StringBuffer == '3') Emperor_NumberBuffer = 3;
  1486.             if(*Emperor_StringBuffer == '4') Emperor_NumberBuffer = 4;
  1487.             if(*Emperor_StringBuffer == '5') Emperor_NumberBuffer = 5;
  1488.             if(*Emperor_StringBuffer == '6') Emperor_NumberBuffer = 6;
  1489.             if(*Emperor_StringBuffer == '7') Emperor_NumberBuffer = 7;
  1490.             if(*Emperor_StringBuffer == '8') Emperor_NumberBuffer = 8;
  1491.             if(*Emperor_StringBuffer == '9') Emperor_NumberBuffer = 9;
  1492.             if(Emperor_StringLength == 1)  Emperor_ReturnBuffer += Emperor_NumberBuffer;
  1493.             if(Emperor_StringLength == 2)  Emperor_ReturnBuffer += 10 * Emperor_NumberBuffer;
  1494.             if(Emperor_StringLength == 3)  Emperor_ReturnBuffer += 100 * Emperor_NumberBuffer;
  1495.             if(Emperor_StringLength == 4)  Emperor_ReturnBuffer += 1000 * Emperor_NumberBuffer;
  1496.             if(Emperor_StringLength == 5)  Emperor_ReturnBuffer += 10000 * Emperor_NumberBuffer;
  1497.             if(Emperor_StringLength == 6)  Emperor_ReturnBuffer += 100000 * Emperor_NumberBuffer;
  1498.             if(Emperor_StringLength == 7)  Emperor_ReturnBuffer += 1000000 * Emperor_NumberBuffer;
  1499.             if(Emperor_StringLength == 8)  Emperor_ReturnBuffer += 10000000 * Emperor_NumberBuffer;
  1500.             if(Emperor_StringLength == 9)  Emperor_ReturnBuffer += 100000000 * Emperor_NumberBuffer;
  1501.             if(Emperor_StringLength == 10) Emperor_ReturnBuffer += 1000000000 * Emperor_NumberBuffer;
  1502.             Emperor_StringBuffer++;
  1503.         }
  1504.     }
  1505.     if(Emperor_NegativeBuffer) Emperor_ReturnBuffer = -Emperor_ReturnBuffer;
  1506.     return(Emperor_ReturnBuffer);
  1507. }
  1508.  
  1509. STRPTR inttostring(LONG Emperor_NumberBuffer1)
  1510. {
  1511.     LONG Emperor_NumberBuffer2;
  1512.     BYTE Emperor_NumberLength = 0;
  1513.     BYTE Emperor_Counter = 0;
  1514.     char *Emperor_ReturnBuffer = "abcdefghij";
  1515.  
  1516.     strcpy(Emperor_ReturnBuffer, "");
  1517.     Emperor_ReturnBuffer[0] = NULL;
  1518.     if(Emperor_NumberBuffer1 < 0)
  1519.     {
  1520.         strcpy(Emperor_ReturnBuffer, "-");
  1521.         Emperor_NumberBuffer1 = -Emperor_NumberBuffer1;
  1522.     }
  1523.     if(Emperor_NumberBuffer1 > 0) Emperor_NumberLength = 1;
  1524.     if(Emperor_NumberBuffer1/10 > 0) Emperor_NumberLength = 2;
  1525.     if(Emperor_NumberBuffer1/100 > 0) Emperor_NumberLength = 3;
  1526.     if(Emperor_NumberBuffer1/1000 > 0) Emperor_NumberLength = 4;
  1527.     if(Emperor_NumberBuffer1/10000 > 0) Emperor_NumberLength = 5;
  1528.     if(Emperor_NumberBuffer1/100000 > 0) Emperor_NumberLength = 6;
  1529.     if(Emperor_NumberBuffer1/1000000 > 0) Emperor_NumberLength = 7;
  1530.     if(Emperor_NumberBuffer1/10000000 > 0) Emperor_NumberLength = 8;
  1531.     if(Emperor_NumberBuffer1/100000000 > 0) Emperor_NumberLength = 9;
  1532.     if(Emperor_NumberBuffer1 == 0)  strcpy(Emperor_ReturnBuffer, "0");
  1533.     else
  1534.     {
  1535.         Emperor_Counter = Emperor_NumberLength;
  1536.         for(;Emperor_Counter > 0;Emperor_Counter--)
  1537.         {
  1538.             if(Emperor_Counter == 9) Emperor_NumberBuffer2 = Emperor_NumberBuffer1/100000000;
  1539.             if(Emperor_Counter == 8) Emperor_NumberBuffer2 = Emperor_NumberBuffer1/10000000;
  1540.             if(Emperor_Counter == 7) Emperor_NumberBuffer2 = Emperor_NumberBuffer1/1000000;
  1541.             if(Emperor_Counter == 6) Emperor_NumberBuffer2 = Emperor_NumberBuffer1/100000;
  1542.             if(Emperor_Counter == 5) Emperor_NumberBuffer2 = Emperor_NumberBuffer1/10000;
  1543.             if(Emperor_Counter == 4) Emperor_NumberBuffer2 = Emperor_NumberBuffer1/1000;
  1544.             if(Emperor_Counter == 3) Emperor_NumberBuffer2 = Emperor_NumberBuffer1/100;
  1545.             if(Emperor_Counter == 2) Emperor_NumberBuffer2 = Emperor_NumberBuffer1/10;
  1546.             if(Emperor_Counter == 1) Emperor_NumberBuffer2 = Emperor_NumberBuffer1;
  1547.             if(Emperor_NumberBuffer2 == 0) strcat(Emperor_ReturnBuffer, "0");
  1548.             if(Emperor_NumberBuffer2 == 1) strcat(Emperor_ReturnBuffer, "1");
  1549.             if(Emperor_NumberBuffer2 == 2) strcat(Emperor_ReturnBuffer, "2");
  1550.             if(Emperor_NumberBuffer2 == 3) strcat(Emperor_ReturnBuffer, "3");
  1551.             if(Emperor_NumberBuffer2 == 4) strcat(Emperor_ReturnBuffer, "4");
  1552.             if(Emperor_NumberBuffer2 == 5) strcat(Emperor_ReturnBuffer, "5");
  1553.             if(Emperor_NumberBuffer2 == 6) strcat(Emperor_ReturnBuffer, "6");
  1554.             if(Emperor_NumberBuffer2 == 7) strcat(Emperor_ReturnBuffer, "7");
  1555.             if(Emperor_NumberBuffer2 == 8) strcat(Emperor_ReturnBuffer, "8");
  1556.             if(Emperor_NumberBuffer2 == 9) strcat(Emperor_ReturnBuffer, "9");
  1557.             if(Emperor_Counter == 9) Emperor_NumberBuffer1 -= Emperor_NumberBuffer2*100000000;
  1558.             if(Emperor_Counter == 8) Emperor_NumberBuffer1 -= Emperor_NumberBuffer2*10000000;
  1559.             if(Emperor_Counter == 7) Emperor_NumberBuffer1 -= Emperor_NumberBuffer2*1000000;
  1560.             if(Emperor_Counter == 6) Emperor_NumberBuffer1 -= Emperor_NumberBuffer2*100000;
  1561.             if(Emperor_Counter == 5) Emperor_NumberBuffer1 -= Emperor_NumberBuffer2*10000;
  1562.             if(Emperor_Counter == 4) Emperor_NumberBuffer1 -= Emperor_NumberBuffer2*1000;
  1563.             if(Emperor_Counter == 3) Emperor_NumberBuffer1 -= Emperor_NumberBuffer2*100;
  1564.             if(Emperor_Counter == 2) Emperor_NumberBuffer1 -= Emperor_NumberBuffer2*10;
  1565.             if(Emperor_Counter == 1) Emperor_NumberBuffer1 -= Emperor_NumberBuffer2;
  1566.         }
  1567.     }
  1568.     return(Emperor_ReturnBuffer);
  1569. }
  1570.